home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 July / Macworld (1999-07).dmg / Shareware World / Info / For Developers / Mops 3.4.sea / Mops source / PPC source / zObjinit < prev    next >
MacBinary  |  1999-02-06  |  10.5 KB  |  [TEXT/MSET]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sat Feb 6 12:19:47 1999, modified Sat Feb 6 12:19:47 1999, creator 'MSET', type ASCII, 10151 bytes "zObjinit" , at 0x2827 381 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[MSET]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 7a 4f 62 6a 69 6e | 69 74 00 00 00 00 00 00 |..zObjin|it......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 53 45 | 54 01 00 00 00 00 00 00 |.TEXTMSE|T.......|
|00000050| 00 00 00 00 00 27 a7 00 | 00 01 7d b2 e2 2a 33 b2 |.....'..|..}..*3.|
|00000060| e2 2a 33 00 00 06 00 00 | 00 00 00 00 00 00 00 00 |.*3.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 4c 6d 00 00 |........|....Lm..|
|00000080| 5c 20 49 6e 69 74 69 61 | 6c 69 7a 61 74 69 6f 6e |\ Initia|lization|
|00000090| 20 6f 66 20 73 79 73 74 | 65 6d 20 6f 62 6a 65 63 | of syst|em objec|
|000000a0| 74 73 2e 0d 0d 73 79 73 | 63 61 6c 6c 20 41 45 49 |ts...sys|call AEI|
|000000b0| 6e 73 74 61 6c 6c 45 76 | 65 6e 74 48 61 6e 64 6c |nstallEv|entHandl|
|000000c0| 65 72 0d 73 79 73 63 61 | 6c 6c 20 49 6e 73 74 61 |er.sysca|ll Insta|
|000000d0| 6c 6c 45 78 63 65 70 74 | 69 6f 6e 48 61 6e 64 6c |llExcept|ionHandl|
|000000e0| 65 72 0d 0d 0d 3a 20 2d | 4d 4f 44 45 4c 45 53 53 |er...: -|MODELESS|
|000000f0| 09 5c 20 53 65 74 73 20 | 6e 6f 72 6d 61 6c 20 65 |.\ Sets |normal e|
|00000100| 76 65 6e 74 20 68 61 6e | 64 6c 69 6e 67 20 2d 20 |vent han|dling - |
|00000110| 6e 6f 20 6d 6f 64 65 6c | 65 73 73 20 64 69 61 6c |no model|ess dial|
|00000120| 6f 67 73 0d 09 78 74 73 | 7b 09 6e 75 6c 6c 2d 65 |ogs..xts|{.null-e|
|00000130| 76 74 09 6d 6f 75 73 65 | 2d 65 76 74 09 6e 75 6c |vt.mouse|-evt.nul|
|00000140| 6c 2d 65 76 74 09 6b 65 | 79 2d 65 76 74 0d 09 09 |l-evt.ke|y-evt...|
|00000150| 09 6e 75 6c 6c 2d 65 76 | 74 09 6b 65 79 2d 65 76 |.null-ev|t.key-ev|
|00000160| 74 09 09 75 70 64 2d 65 | 76 74 09 09 64 69 73 6b |t..upd-e|vt..disk|
|00000170| 2d 65 76 74 0d 09 09 09 | 61 63 74 76 2d 65 76 74 |-evt....|actv-evt|
|00000180| 09 6e 75 6c 6c 2d 65 76 | 74 09 6e 75 6c 6c 2d 65 |.null-ev|t.null-e|
|00000190| 76 74 09 6e 75 6c 6c 2d | 65 76 74 0d 09 09 09 6e |vt.null-|evt....n|
|000001a0| 75 6c 6c 2d 65 76 74 09 | 6e 75 6c 6c 2d 65 76 74 |ull-evt.|null-evt|
|000001b0| 09 6e 75 6c 6c 2d 65 76 | 74 09 4f 53 2d 65 76 74 |.null-ev|t.OS-evt|
|000001c0| 0d 09 09 09 6e 75 6c 6c | 2d 65 76 74 09 6e 75 6c |....null|-evt.nul|
|000001d0| 6c 2d 65 76 74 09 6e 75 | 6c 6c 2d 65 76 74 09 6e |l-evt.nu|ll-evt.n|
|000001e0| 75 6c 6c 2d 65 76 74 0d | 09 09 09 6e 75 6c 6c 2d |ull-evt.|...null-|
|000001f0| 65 76 74 09 6e 75 6c 6c | 2d 65 76 74 09 6e 75 6c |evt.null|-evt.nul|
|00000200| 6c 2d 65 76 74 09 48 4c | 2d 65 76 74 20 20 20 7d |l-evt.HL|-evt }|
|00000210| 0d 09 70 75 74 3a 20 66 | 45 76 65 6e 74 20 20 3b |..put: f|Event ;|
|00000220| 0d 0d 27 20 6e 75 6c 6c | 2d 65 76 74 20 66 69 6c |..' null|-evt fil|
|00000230| 6c 3a 20 66 65 76 65 6e | 74 09 09 5c 20 75 73 69 |l: feven|t..\ usi|
|00000240| 6e 67 20 2d 6d 6f 64 65 | 6c 65 73 73 20 64 75 72 |ng -mode|less dur|
|00000250| 69 6e 67 20 63 6f 6d 70 | 69 6c 61 74 69 6f 6e 20 |ing comp|ilation |
|00000260| 63 61 75 73 65 73 0d 09 | 09 09 09 09 09 09 5c 20 |causes..|......\ |
|00000270| 73 74 72 61 6e 67 65 20 | 73 63 72 6f 6c 6c 69 6e |strange |scrollin|
|00000280| 67 20 65 66 66 65 63 74 | 73 20 69 6e 20 66 57 69 |g effect|s in fWi|
|00000290| 6e 64 0d 0d 0d 5c 09 09 | 3d 3d 3d 3d 3d 3d 3d 3d |nd...\..|========|
|000002a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 20 3a 50 50 |========|==== :PP|
|000002b0| 43 5f 50 52 4f 43 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d |C_PROC =|========|
|000002c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 0d 3a 70 |========|====..:p|
|000002d0| 70 63 5f 63 6f 64 65 20 | 3a 65 6e 74 72 79 5f 63 |pc_code |:entry_c|
|000002e0| 6f 64 65 0d 09 72 4f 53 | 53 50 09 2d 32 35 36 09 |ode..rOS|SP.-256.|
|000002f0| 72 4f 53 53 50 09 73 74 | 77 75 2c 0d 09 52 54 4f |rOSSP.st|wu,..RTO|
|00000300| 43 09 32 30 09 09 72 4f | 53 53 50 09 73 74 77 2c |C.20..rO|SSP.stw,|
|00000310| 0d 09 72 31 33 09 09 31 | 30 30 09 09 72 4f 53 53 |..r13..1|00..rOSS|
|00000320| 50 09 73 74 77 2c 0d 09 | 72 31 34 09 09 31 30 34 |P.stw,..|r14..104|
|00000330| 09 09 72 4f 53 53 50 09 | 73 74 77 2c 0d 09 72 31 |..rOSSP.|stw,..r1|
|00000340| 35 09 09 31 30 38 09 09 | 72 4f 53 53 50 09 73 74 |5..108..|rOSSP.st|
|00000350| 77 2c 0d 09 72 31 36 09 | 09 31 31 32 09 09 72 4f |w,..r16.|.112..rO|
|00000360| 53 53 50 09 73 74 77 2c | 0d 09 72 31 37 09 09 31 |SSP.stw,|..r17..1|
|00000370| 31 36 09 09 72 4f 53 53 | 50 09 73 74 77 2c 0d 09 |16..rOSS|P.stw,..|
|00000380| 72 31 38 09 09 31 32 30 | 09 09 72 4f 53 53 50 09 |r18..120|..rOSSP.|
|00000390| 73 74 77 2c 0d 09 72 31 | 39 09 09 31 32 34 09 09 |stw,..r1|9..124..|
|000003a0| 72 4f 53 53 50 09 73 74 | 77 2c 0d 0d 09 72 31 33 |rOSSP.st|w,...r13|
|000003b0| 09 09 31 30 34 09 09 72 | 54 4f 43 09 6c 77 7a 2c |..104..r|TOC.lwz,|
|000003c0| 0d 09 72 31 34 09 09 31 | 30 38 09 09 72 54 4f 43 |..r14..1|08..rTOC|
|000003d0| 09 6c 77 7a 2c 0d 09 72 | 31 35 09 09 31 31 32 09 |.lwz,..r|15..112.|
|000003e0| 09 72 54 4f 43 09 6c 77 | 7a 2c 0d 09 72 31 36 09 |.rTOC.lw|z,..r16.|
|000003f0| 09 31 31 36 09 09 72 54 | 4f 43 09 6c 77 7a 2c 0d |.116..rT|OC.lwz,.|
|00000400| 09 72 31 37 09 09 31 32 | 30 09 09 72 54 4f 43 09 |.r17..12|0..rTOC.|
|00000410| 6c 77 7a 2c 0d 09 72 31 | 37 09 09 72 31 37 09 09 |lwz,..r1|7..r17..|
|00000420| 2d 31 30 32 34 09 61 64 | 64 69 2c 0d 09 72 31 38 |-1024.ad|di,..r18|
|00000430| 09 09 31 32 34 09 09 72 | 54 4f 43 09 6c 77 7a 2c |..124..r|TOC.lwz,|
|00000440| 0d 09 72 31 38 09 09 72 | 31 38 09 09 2d 34 30 39 |..r18..r|18..-409|
|00000450| 36 09 61 64 64 69 2c 0d | 09 72 31 39 09 09 31 32 |6.addi,.|.r19..12|
|00000460| 38 09 09 72 54 4f 43 09 | 6c 77 7a 2c 0d 3b 70 70 |8..rTOC.|lwz,.;pp|
|00000470| 63 5f 63 6f 64 65 0d 0d | 3a 70 70 63 5f 63 6f 64 |c_code..|:ppc_cod|
|00000480| 65 20 3b 65 6e 74 72 79 | 5f 63 6f 64 65 0d 09 72 |e ;entry|_code..r|
|00000490| 31 33 09 09 31 30 30 09 | 09 72 4f 53 53 50 09 6c |13..100.|.rOSSP.l|
|000004a0| 77 7a 2c 0d 09 72 31 34 | 09 09 31 30 34 09 09 72 |wz,..r14|..104..r|
|000004b0| 4f 53 53 50 09 6c 77 7a | 2c 0d 09 72 31 35 09 09 |OSSP.lwz|,..r15..|
|000004c0| 31 30 38 09 09 72 4f 53 | 53 50 09 6c 77 7a 2c 0d |108..rOS|SP.lwz,.|
|000004d0| 09 72 31 36 09 09 31 31 | 32 09 09 72 4f 53 53 50 |.r16..11|2..rOSSP|
|000004e0| 09 6c 77 7a 2c 0d 09 72 | 31 37 09 09 31 31 36 09 |.lwz,..r|17..116.|
|000004f0| 09 72 4f 53 53 50 09 6c | 77 7a 2c 0d 09 72 31 38 |.rOSSP.l|wz,..r18|
|00000500| 09 09 31 32 30 09 09 72 | 4f 53 53 50 09 6c 77 7a |..120..r|OSSP.lwz|
|00000510| 2c 0d 09 72 31 39 09 09 | 31 32 34 09 09 72 4f 53 |,..r19..|124..rOS|
|00000520| 53 50 09 6c 77 7a 2c 0d | 09 72 4f 53 53 50 09 30 |SP.lwz,.|.rOSSP.0|
|00000530| 09 09 72 4f 53 53 50 09 | 6c 77 7a 2c 09 09 5c 20 |..rOSSP.|lwz,..\ |
|00000540| 74 61 6b 65 20 64 6f 77 | 6e 20 66 72 61 6d 65 0d |take dow|n frame.|
|00000550| 09 09 09 09 09 09 09 62 | 6c 72 2c 0d 3b 70 70 63 |.......b|lr,.;ppc|
|00000560| 5f 63 6f 64 65 0d 0d 0d | 28 2a 09 3a 50 50 43 5f |_code...|(*.:PPC_|
|00000570| 50 52 4f 43 20 62 65 67 | 69 6e 73 20 61 20 64 65 |PROC beg|ins a de|
|00000580| 66 69 6e 69 74 69 6f 6e | 20 74 68 61 74 20 69 73 |finition| that is|
|00000590| 20 74 6f 20 62 65 20 75 | 73 65 64 20 61 73 20 61 | to be u|sed as a|
|000005a0| 20 63 61 6c 6c 62 61 63 | 6b 2e 0d 09 4e 6f 74 65 | callbac|k...Note|
|000005b0| 20 74 68 61 74 20 77 65 | 20 6d 61 6b 65 20 6e 6f | that we| make no|
|000005c0| 20 70 72 6f 76 69 73 69 | 6f 6e 20 74 6f 20 63 61 | provisi|on to ca|
|000005d0| 6c 6c 20 6f 6e 65 20 6f | 66 20 74 68 65 73 65 20 |ll one o|f these |
|000005e0| 64 69 72 65 63 74 6c 79 | 20 66 72 6f 6d 0d 09 4d |directly| from..M|
|000005f0| 6f 70 73 20 63 6f 64 65 | 20 2d 2d 20 74 68 65 72 |ops code| -- ther|
|00000600| 65 27 73 20 72 65 61 6c | 6c 79 20 6e 6f 20 72 65 |e's real|ly no re|
|00000610| 61 73 6f 6e 20 77 68 79 | 20 61 6e 79 6f 6e 65 20 |ason why| anyone |
|00000620| 77 6f 75 6c 64 20 77 61 | 6e 74 20 74 6f 2e 0d 09 |would wa|nt to...|
|00000630| 57 65 20 75 73 65 20 61 | 20 68 61 6e 64 6c 65 72 |We use a| handler|
|00000640| 20 63 6f 64 65 20 6f 66 | 20 42 45 30 34 2c 20 61 | code of| BE04, a|
|00000650| 6e 64 20 61 64 64 20 73 | 6f 6d 65 20 65 78 74 72 |nd add s|ome extr|
|00000660| 61 20 69 6e 66 6f 20 61 | 66 74 65 72 20 0d 09 74 |a info a|fter ..t|
|00000670| 68 65 20 68 65 61 64 65 | 72 20 61 6e 64 20 62 65 |he heade|r and be|
|00000680| 66 6f 72 65 20 74 68 65 | 20 63 6f 64 65 20 73 74 |fore the| code st|
|00000690| 61 72 74 73 2e 20 20 54 | 68 69 73 20 69 73 20 74 |arts. T|his is t|
|000006a0| 68 65 20 6c 6f 67 69 63 | 61 6c 20 70 6c 61 63 65 |he logic|al place|
|000006b0| 0d 09 74 6f 20 70 75 74 | 20 74 68 69 73 20 69 6e |..to put| this in|
|000006c0| 66 6f 2c 20 61 6c 74 68 | 6f 75 67 68 20 69 74 20 |fo, alth|ough it |
|000006d0| 6d 65 61 6e 73 20 74 68 | 61 74 20 77 65 20 63 61 |means th|at we ca|
|000006e0| 6e 27 74 20 75 73 65 20 | 22 70 6f 73 74 70 6f 6e |n't use |"postpon|
|000006f0| 65 20 3a 22 2e 0d 09 53 | 65 65 20 74 68 65 20 63 |e :"...S|ee the c|
|00000700| 6f 6d 6d 65 6e 74 73 20 | 69 6e 20 74 68 65 20 63 |omments |in the c|
|00000710| 6f 64 65 20 62 65 6c 6f | 77 20 66 6f 72 20 74 68 |ode belo|w for th|
|00000720| 65 20 6e 75 74 73 20 61 | 6e 64 20 62 6f 6c 74 73 |e nuts a|nd bolts|
|00000730| 2e 0d 0d 09 41 74 20 3b | 70 70 63 5f 70 72 6f 63 |....At ;|ppc_proc|
|00000740| 20 74 69 6d 65 2c 20 77 | 65 20 61 64 64 20 63 6f | time, w|e add co|
|00000750| 64 65 20 61 74 20 74 68 | 65 20 62 65 67 69 6e 6e |de at th|e beginn|
|00000760| 69 6e 67 20 61 6e 64 20 | 74 68 65 20 65 6e 64 0d |ing and |the end.|
|00000770| 09 74 6f 20 73 61 76 65 | 20 74 68 65 20 72 65 67 |.to save| the reg|
|00000780| 73 20 77 65 27 72 65 20 | 67 6f 69 6e 67 20 74 6f |s we're |going to|
|00000790| 20 63 68 61 6e 67 65 2c | 20 73 65 74 20 75 70 20 | change,| set up |
|000007a0| 74 68 65 20 4d 6f 70 73 | 0d 09 72 65 67 73 2c 20 |the Mops|..regs, |
|000007b0| 74 68 65 6e 20 72 65 73 | 74 6f 72 65 20 65 76 65 |then res|tore eve|
|000007c0| 72 79 74 68 69 6e 67 20 | 61 74 20 74 68 65 20 65 |rything |at the e|
|000007d0| 6e 64 2e 20 20 54 68 69 | 73 20 69 73 20 74 68 65 |nd. Thi|s is the|
|000007e0| 20 73 61 6d 65 0d 09 61 | 73 20 77 68 61 74 20 77 | same..a|s what w|
|000007f0| 65 20 68 61 76 65 20 74 | 6f 20 64 6f 20 77 69 74 |e have t|o do wit|
|00000800| 68 20 3a 45 4e 54 52 59 | 20 77 6f 72 64 73 20 28 |h :ENTRY| words (|
|00000810| 65 6e 74 72 79 20 70 6f | 69 6e 74 73 20 66 6f 72 |entry po|ints for|
|00000820| 0d 09 61 20 73 68 61 72 | 65 64 20 6c 69 62 72 61 |..a shar|ed libra|
|00000830| 72 79 29 2e 0d 2a 29 0d | 0d 0d 3a 20 3a 50 50 43 |ry)..*).|..: :PPC|
|00000840| 5f 50 52 4f 43 20 20 28 | 20 70 72 6f 63 49 6e 66 |_PROC (| procInf|
|00000850| 6f 20 2d 2d 20 33 30 36 | 20 29 0d 0d 09 43 44 50 |o -- 306| )...CDP|
|00000860| 20 2d 3e 20 63 6f 6e 73 | 74 5f 64 61 74 61 5f 73 | -> cons|t_data_s|
|00000870| 74 61 72 74 0d 09 70 70 | 63 5f 68 65 61 64 65 72 |tart..pp|c_header|
|00000880| 0d 09 24 20 42 45 30 34 | 30 30 30 30 20 63 6f 64 |..$ BE04|0000 cod|
|00000890| 65 2c 09 09 5c 20 68 61 | 6e 64 6c 65 72 20 63 6f |e,..\ ha|ndler co|
|000008a0| 64 65 20 66 6f 72 20 3a | 50 50 43 5f 70 72 6f 63 |de for :|PPC_proc|
|000008b0| 20 64 65 66 6e 73 2c 0d | 09 09 09 09 09 09 09 5c | defns,.|.......\|
|000008c0| 20 20 61 6e 64 20 61 6c | 69 67 6e 6d 65 6e 74 0d | and al|ignment.|
|000008d0| 0d 09 61 6c 69 67 6e 34 | 09 09 09 09 09 5c 20 61 |..align4|.....\ a|
|000008e0| 6c 69 67 6e 20 69 6e 20 | 64 61 74 61 20 61 72 65 |lign in |data are|
|000008f0| 61 0d 09 43 44 50 09 09 | 09 09 09 09 5c 20 73 61 |a..CDP..|....\ sa|
|00000900| 76 65 20 43 44 50 20 66 | 6f 72 20 72 65 6c 6f 63 |ve CDP f|or reloc|
|00000910| 21 0d 09 30 20 63 6f 64 | 65 2c 09 09 09 09 09 5c |!..0 cod|e,.....\|
|00000920| 20 69 6e 20 63 6f 64 65 | 20 61 72 65 61 2c 20 73 | in code| area, s|
|00000930| 70 61 63 65 20 66 6f 72 | 20 72 65 6c 6f 63 20 70 |pace for| reloc p|
|00000940| 74 72 0d 09 73 77 61 70 | 20 63 6f 64 65 2c 09 09 |tr..swap| code,..|
|00000950| 09 09 5c 20 61 6e 64 20 | 74 68 65 6e 20 63 6f 6d |..\ and |then com|
|00000960| 65 73 20 74 68 65 20 70 | 72 6f 63 49 6e 66 6f 0d |es the p|rocInfo.|
|00000970| 09 30 20 63 6f 64 65 2c | 09 09 09 09 09 5c 20 20 |.0 code,|.....\ |
|00000980| 32 20 62 79 74 65 73 20 | 70 61 64 64 69 6e 67 2c |2 bytes |padding,|
|00000990| 20 32 20 69 6e 69 74 69 | 61 6c 20 66 6c 61 67 20 | 2 initi|al flag |
|000009a0| 62 79 74 65 73 0d 09 44 | 50 20 73 77 61 70 20 72 |bytes..D|P swap r|
|000009b0| 65 6c 6f 63 21 09 09 09 | 5c 20 73 74 6f 72 65 20 |eloc!...|\ store |
|000009c0| 72 65 6c 6f 63 20 70 6f | 69 6e 74 65 72 20 74 6f |reloc po|inter to|
|000009d0| 20 64 61 74 61 20 61 72 | 65 61 0d 0d 09 31 32 20 | data ar|ea...12 |
|000009e0| 72 65 73 65 72 76 65 09 | 09 09 09 5c 20 69 6e 20 |reserve.|...\ in |
|000009f0| 64 61 74 61 20 61 72 65 | 61 2c 20 6c 65 61 76 65 |data are|a, leave|
|00000a00| 20 72 6f 6f 6d 20 66 6f | 72 3a 0d 09 09 09 09 09 | room fo|r:......|
|00000a10| 09 09 5c 09 34 20 62 79 | 74 65 73 3a 09 70 6f 69 |..\.4 by|tes:.poi|
|00000a20| 6e 74 65 72 20 74 6f 20 | 72 6f 75 74 69 6e 65 20 |nter to |routine |
|00000a30| 64 65 73 63 72 69 70 74 | 6f 72 0d 09 09 09 09 09 |descript|or......|
|00000a40| 09 09 5c 09 38 20 62 79 | 74 65 73 3a 09 74 72 61 |..\.8 by|tes:.tra|
|00000a50| 6e 73 66 65 72 20 76 65 | 63 74 6f 72 0d 09 09 09 |nsfer ve|ctor....|
|00000a60| 09 09 09 09 5c 20 57 65 | 20 73 65 74 20 74 68 65 |....\ We| set the|
|00000a70| 73 65 20 75 70 20 61 74 | 20 66 69 78 5f 70 72 6f |se up at| fix_pro|
|00000a80| 63 73 20 62 65 6c 6f 77 | 2c 20 61 74 20 6f 62 6a |cs below|, at obj|
|00000a90| 69 6e 69 74 20 74 69 6d | 65 2e 0d 0d 09 66 61 6c |init tim|e....fal|
|00000aa0| 73 65 20 2d 3e 20 6d 65 | 74 68 6f 64 3f 0d 09 66 |se -> me|thod?..f|
|00000ab0| 61 6c 73 65 20 2d 3e 20 | 6e 6f 6e 61 6d 65 3f 0d |alse -> |noname?.|
|00000ac0| 09 30 20 3e 73 69 7a 65 | 3a 20 63 6f 6e 74 72 6f |.0 >size|: contro|
|00000ad0| 6c 5f 73 74 6b 20 20 30 | 20 3e 73 69 7a 65 3a 20 |l_stk 0| >size: |
|00000ae0| 63 6f 6e 74 72 6f 6c 5f | 66 6c 61 67 73 0d 0d 09 |control_|flags...|
|00000af0| 66 61 6c 73 65 20 70 70 | 63 5f 65 6e 74 72 79 09 |false pp|c_entry.|
|00000b00| 09 09 5c 20 68 61 6e 64 | 6c 65 20 70 70 63 20 70 |..\ hand|le ppc p|
|00000b10| 72 6f 63 20 65 6e 74 72 | 79 0d 09 66 61 6c 73 65 |roc entr|y..false|
|00000b20| 20 2d 3e 20 6c 65 61 66 | 3f 09 09 09 5c 20 73 6f | -> leaf|?...\ so|
|00000b30| 20 6f 75 72 20 70 61 72 | 6d 73 20 67 65 74 20 68 | our par|ms get h|
|00000b40| 61 6e 64 6c 65 64 20 63 | 6f 6e 73 69 73 74 65 6e |andled c|onsisten|
|00000b50| 74 6c 79 0d 09 70 6f 73 | 74 70 6f 6e 65 20 68 69 |tly..pos|tpone hi|
|00000b60| 64 65 09 09 09 5c 20 6e | 65 77 20 77 6f 72 64 20 |de...\ n|ew word |
|00000b70| 69 73 20 68 69 64 64 65 | 6e 20 75 6e 74 69 6c 20 |is hidde|n until |
|00000b80| 64 65 66 6e 20 65 6e 64 | 0d 09 31 20 2d 3e 20 67 |defn end|..1 -> g|
|00000b90| 70 72 5f 72 74 6e 5f 63 | 6e 74 09 09 5c 20 3a 70 |pr_rtn_c|nt..\ :p|
|00000ba0| 70 63 5f 70 72 6f 63 73 | 20 61 6c 77 61 79 73 20 |pc_procs| always |
|00000bb0| 72 65 74 75 72 6e 20 6a | 75 73 74 20 6f 6e 65 20 |return j|ust one |
|00000bc0| 72 65 73 75 6c 74 20 69 | 6e 20 72 33 0d 09 2d 31 |result i|n r3..-1|
|00000bd0| 20 2d 3e 20 66 70 72 5f | 72 74 6e 5f 63 6e 74 09 | -> fpr_|rtn_cnt.|
|00000be0| 09 5c 20 74 68 69 73 20 | 6d 61 79 20 6e 65 65 64 |.\ this |may need|
|00000bf0| 20 72 65 76 69 73 69 6e | 67 20 24 24 24 24 24 24 | revisin|g $$$$$$|
|00000c00| 24 24 0d 09 74 72 75 65 | 20 2d 3e 20 65 6e 74 72 |$$..true| -> entr|
|00000c10| 79 3f 0d 0d 09 64 72 6f | 70 20 33 30 36 09 09 09 |y?...dro|p 306...|
|00000c20| 09 5c 20 75 73 65 20 64 | 69 66 66 65 72 65 6e 74 |.\ use d|ifferent|
|00000c30| 20 73 65 63 75 72 69 74 | 79 20 6d 61 72 6b 65 72 | securit|y marker|
|00000c40| 20 66 72 6f 6d 20 63 6f | 6c 6f 6e 0d 3b 09 09 69 | from co|lon.;..i|
|00000c50| 6d 6d 65 64 69 61 74 65 | 0d 0d 0d 3a 20 3b 70 70 |mmediate|...: ;pp|
|00000c60| 63 5f 70 72 6f 63 20 7b | 20 5c 20 78 20 2d 2d 20 |c_proc {| \ x -- |
|00000c70| 7d 0d 09 33 30 36 20 3f | 64 65 66 6e 0d 09 63 75 |}..306 ?|defn..cu|
|00000c80| 72 72 2d 64 65 66 20 32 | 2d 20 28 3b 29 0d 09 2d |rr-def 2|- (;)..-|
|00000c90| 34 20 2b 2b 3e 20 43 44 | 50 09 09 09 09 5c 20 64 |4 ++> CD|P....\ d|
|00000ca0| 65 6c 65 74 65 20 74 68 | 65 20 62 6c 72 0d 09 0d |elete th|e blr...|
|00000cb0| 09 5b 27 5d 20 3b 65 6e | 74 72 79 5f 63 6f 64 65 |.['] ;en|try_code|
|00000cc0| 20 32 2b 20 20 43 44 50 | 20 20 33 36 20 61 6c 69 | 2+ CDP| 36 ali|
|00000cd0| 67 6e 65 64 5f 6d 6f 76 | 65 0d 09 33 36 20 2b 2b |gned_mov|e..36 ++|
|00000ce0| 3e 20 43 44 50 0d 0d 09 | 5b 27 5d 20 3a 65 6e 74 |> CDP...|['] :ent|
|00000cf0| 72 79 5f 63 6f 64 65 20 | 32 2b 0d 09 63 75 72 72 |ry_code |2+..curr|
|00000d00| 2d 64 65 66 0d 09 37 32 | 20 20 61 6c 69 67 6e 65 |-def..72| aligne|
|00000d10| 64 5f 6d 6f 76 65 0d 0d | 3b 09 09 69 6d 6d 65 64 |d_move..|;..immed|
|00000d20| 69 61 74 65 0d 0d 0d 0d | 6b 6f 6e 73 74 20 75 70 |iate....|konst up|
|00000d30| 70 41 45 45 76 65 6e 74 | 48 61 6e 64 6c 65 72 50 |pAEEvent|HandlerP|
|00000d40| 72 6f 63 49 6e 66 6f 0d | 3a 70 70 63 5f 70 72 6f |rocInfo.|:ppc_pro|
|00000d50| 63 20 6f 70 65 6e 41 70 | 70 48 61 6e 64 6c 65 72 |c openAp|pHandler|
|00000d60| 20 20 7b 20 78 20 79 20 | 7a 20 2d 2d 20 6e 6f 45 | { x y |z -- noE|
|00000d70| 72 72 20 7d 20 20 30 20 | 20 3b 70 70 63 5f 70 72 |rr } 0 | ;ppc_pr|
|00000d80| 6f 63 0d 0d 6b 6f 6e 73 | 74 20 75 70 70 41 45 45 |oc..kons|t uppAEE|
|00000d90| 76 65 6e 74 48 61 6e 64 | 6c 65 72 50 72 6f 63 49 |ventHand|lerProcI|
|00000da0| 6e 66 6f 0d 3a 70 70 63 | 5f 70 72 6f 63 20 6f 70 |nfo.:ppc|_proc op|
|00000db0| 65 6e 44 6f 63 48 61 6e | 64 6c 65 72 20 20 7b 20 |enDocHan|dler { |
|00000dc0| 78 20 79 20 7a 20 2d 2d | 20 6e 6f 45 72 72 20 7d |x y z --| noErr }|
|00000dd0| 20 20 30 20 20 3b 70 70 | 63 5f 70 72 6f 63 0d 0d | 0 ;pp|c_proc..|
|00000de0| 6b 6f 6e 73 74 20 75 70 | 70 41 45 45 76 65 6e 74 |konst up|pAEEvent|
|00000df0| 48 61 6e 64 6c 65 72 50 | 72 6f 63 49 6e 66 6f 0d |HandlerP|rocInfo.|
|00000e00| 3a 70 70 63 5f 70 72 6f | 63 20 70 72 69 6e 74 44 |:ppc_pro|c printD|
|00000e10| 6f 63 48 61 6e 64 6c 65 | 72 20 20 7b 20 78 20 79 |ocHandle|r { x y|
|00000e20| 20 7a 20 2d 2d 20 6e 6f | 45 72 72 20 7d 20 20 30 | z -- no|Err } 0|
|00000e30| 20 20 3b 70 70 63 5f 70 | 72 6f 63 0d 0d 6b 6f 6e | ;ppc_p|roc..kon|
|00000e40| 73 74 20 75 70 70 41 45 | 45 76 65 6e 74 48 61 6e |st uppAE|EventHan|
|00000e50| 64 6c 65 72 50 72 6f 63 | 49 6e 66 6f 0d 3a 70 70 |dlerProc|Info.:pp|
|00000e60| 63 5f 70 72 6f 63 20 71 | 75 69 74 41 70 70 48 61 |c_proc q|uitAppHa|
|00000e70| 6e 64 6c 65 72 20 20 7b | 20 78 20 79 20 7a 20 2d |ndler {| x y z -|
|00000e80| 2d 20 6e 6f 45 72 72 20 | 7d 20 20 30 20 20 3b 70 |- noErr |} 0 ;p|
|00000e90| 70 63 5f 70 72 6f 63 0d | 0d 0d 0d 3a 20 69 6e 73 |pc_proc.|...: ins|
|00000ea0| 74 61 6c 6c 5f 41 45 5f | 68 61 6e 64 6c 65 72 20 |tall_AE_|handler |
|00000eb0| 20 28 20 61 65 76 74 2d | 74 79 70 65 20 65 76 65 | ( aevt-|type eve|
|00000ec0| 6e 74 2d 74 79 70 65 20 | 78 74 20 2d 2d 20 29 0d |nt-type |xt -- ).|
|00000ed0| 5c 09 32 2b 20 40 61 62 | 73 20 40 09 09 09 09 5c |\.2+ @ab|s @....\|
|00000ee0| 20 67 65 74 20 74 68 65 | 20 55 50 50 20 66 72 6f | get the| UPP fro|
|00000ef0| 6d 20 74 68 65 20 3a 70 | 72 6f 63 20 69 6e 66 6f |m the :p|roc info|
|00000f00| 0d 09 30 09 09 09 09 09 | 09 5c 20 68 61 6e 64 6c |..0.....|.\ handl|
|00000f10| 65 72 52 65 66 43 6f 6e | 20 3d 20 30 0d 09 30 09 |erRefCon| = 0..0.|
|00000f20| 09 09 09 09 09 5c 20 69 | 73 53 79 73 48 61 6e 64 |.....\ i|sSysHand|
|00000f30| 6c 65 72 20 3d 20 66 61 | 6c 73 65 0d 09 41 45 49 |ler = fa|lse..AEI|
|00000f40| 6e 73 74 61 6c 6c 45 76 | 65 6e 74 48 61 6e 64 6c |nstallEv|entHandl|
|00000f50| 65 72 20 20 3f 73 74 61 | 72 74 55 70 45 72 72 6f |er ?sta|rtUpErro|
|00000f60| 72 0d 3b 0d 0d 0d 3a 20 | 69 6e 73 74 61 6c 6c 5f |r.;...: |install_|
|00000f70| 72 65 71 64 5f 61 70 70 | 6c 65 45 76 65 6e 74 73 |reqd_app|leEvents|
|00000f80| 0d 09 27 74 79 70 65 20 | 61 65 76 74 20 20 27 74 |..'type |aevt 't|
|00000f90| 79 70 65 20 6f 61 70 70 | 0d 09 5b 27 5d 20 6f 70 |ype oapp|..['] op|
|00000fa0| 65 6e 41 70 70 48 61 6e | 64 6c 65 72 09 09 09 5c |enAppHan|dler...\|
|00000fb0| 20 41 45 20 68 61 6e 64 | 6c 65 72 20 61 64 64 72 | AE hand|ler addr|
|00000fc0| 0d 09 69 6e 73 74 61 6c | 6c 5f 41 45 5f 68 61 6e |..instal|l_AE_han|
|00000fd0| 64 6c 65 72 0d 09 0d 09 | 27 74 79 70 65 20 61 65 |dler....|'type ae|
|00000fe0| 76 74 20 20 27 74 79 70 | 65 20 6f 64 6f 63 0d 09 |vt 'typ|e odoc..|
|00000ff0| 5b 27 5d 20 6f 70 65 6e | 44 6f 63 48 61 6e 64 6c |['] open|DocHandl|
|00001000| 65 72 0d 09 69 6e 73 74 | 61 6c 6c 5f 41 45 5f 68 |er..inst|all_AE_h|
|00001010| 61 6e 64 6c 65 72 0d 09 | 0d 09 27 74 79 70 65 20 |andler..|..'type |
|00001020| 61 65 76 74 20 20 27 74 | 79 70 65 20 70 64 6f 63 |aevt 't|ype pdoc|
|00001030| 0d 09 5b 27 5d 09 50 72 | 69 6e 74 44 6f 63 48 61 |..['].Pr|intDocHa|
|00001040| 6e 64 6c 65 72 0d 09 69 | 6e 73 74 61 6c 6c 5f 41 |ndler..i|nstall_A|
|00001050| 45 5f 68 61 6e 64 6c 65 | 72 0d 0d 09 27 74 79 70 |E_handle|r...'typ|
|00001060| 65 20 61 65 76 74 20 20 | 27 74 79 70 65 20 71 75 |e aevt |'type qu|
|00001070| 69 74 0d 09 5b 27 5d 20 | 51 75 69 74 41 70 70 48 |it..['] |QuitAppH|
|00001080| 61 6e 64 6c 65 72 0d 09 | 69 6e 73 74 61 6c 6c 5f |andler..|install_|
|00001090| 41 45 5f 68 61 6e 64 6c | 65 72 0d 3b 0d 0d 0d 5c |AE_handl|er.;...\|
|000010a0| 09 09 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..======|========|
|000010b0| 3d 3d 3d 3d 3d 20 20 45 | 58 43 45 50 54 49 4f 4e |===== E|XCEPTION|
|000010c0| 53 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |S ======|========|
|000010d0| 3d 3d 3d 3d 3d 0d 0d 28 | 2a 20 0d 57 65 20 68 61 |=====..(|* .We ha|
|000010e0| 76 65 20 74 6f 20 72 65 | 73 6f 72 74 20 74 6f 20 |ve to re|sort to |
|000010f0| 61 73 73 65 6d 62 6c 79 | 20 66 6f 72 20 6f 75 72 |assembly| for our|
|00001100| 20 65 78 63 65 70 74 69 | 6f 6e 20 68 61 6e 64 6c | excepti|on handl|
|00001110| 65 72 2c 20 73 69 6e 63 | 65 0d 77 68 65 6e 20 69 |er, sinc|e.when i|
|00001120| 74 27 73 20 63 61 6c 6c | 65 64 20 6e 6f 6e 65 20 |t's call|ed none |
|00001130| 6f 72 20 6f 75 72 20 72 | 65 67 69 73 74 65 72 73 |or our r|egisters|
|00001140| 20 61 72 65 20 73 65 74 | 20 75 70 21 20 20 57 65 | are set| up! We|
|00001150| 20 72 65 63 6f 76 65 72 | 0d 74 68 65 6d 20 66 72 | recover|.them fr|
|00001160| 6f 6d 20 74 68 65 20 72 | 65 67 69 73 74 65 72 20 |om the r|egister |
|00001170| 73 61 76 65 20 61 72 65 | 61 20 69 6e 20 74 68 65 |save are|a in the|
|00001180| 20 65 78 63 65 70 74 69 | 6f 6e 20 69 6e 66 6f 20 | excepti|on info |
|00001190| 28 73 65 65 20 74 68 65 | 0d 64 65 73 63 72 69 70 |(see the|.descrip|
|000011a0| 74 69 6f 6e 20 6f 66 20 | 74 68 69 73 20 69 6e 20 |tion of |this in |
|000011b0| 49 4d 29 2e 20 20 45 61 | 63 68 20 72 65 67 20 69 |IM). Ea|ch reg i|
|000011c0| 73 20 73 61 76 65 64 20 | 69 6e 20 38 20 62 79 74 |s saved |in 8 byt|
|000011d0| 65 73 2c 20 73 6f 0d 65 | 76 65 72 79 74 68 69 6e |es, so.e|verythin|
|000011e0| 67 20 77 69 6c 6c 20 62 | 65 20 63 6f 6d 70 61 74 |g will b|e compat|
|000011f0| 69 62 6c 65 20 6f 6e 20 | 66 75 74 75 72 65 20 36 |ible on |future 6|
|00001200| 34 2d 62 69 74 20 50 50 | 43 73 2e 20 20 28 57 68 |4-bit PP|Cs. (Wh|
|00001210| 65 6e 0d 74 68 61 74 20 | 68 61 70 70 65 6e 73 2c |en.that |happens,|
|00001220| 20 77 65 27 6c 6c 20 68 | 61 76 65 20 74 6f 20 72 | we'll h|ave to r|
|00001230| 65 76 69 73 65 20 74 68 | 69 73 20 63 6f 64 65 2e |evise th|is code.|
|00001240| 20 20 49 20 74 68 69 6e | 6b 20 69 74 20 77 69 6c | I thin|k it wil|
|00001250| 6c 0d 62 65 20 61 20 77 | 68 69 6c 65 20 79 65 74 |l.be a w|hile yet|
|00001260| 2e 29 0d 0d 4f 6e 20 65 | 6e 74 72 79 2c 20 72 33 |.)..On e|ntry, r3|
|00001270| 20 2d 3e 20 74 68 65 20 | 65 78 63 65 70 74 69 6f | -> the |exceptio|
|00001280| 6e 20 69 6e 66 6f 2e 0d | 0d 4e 6f 74 65 20 66 72 |n info..|.Note fr|
|00001290| 6f 6d 20 41 70 70 6c 65 | 3a 0d 09 41 6e 20 45 78 |om Apple|:..An Ex|
|000012a0| 63 65 70 74 69 6f 6e 48 | 61 6e 64 6c 65 72 20 69 |ceptionH|andler i|
|000012b0| 73 20 4e 4f 54 20 61 20 | 55 6e 69 76 65 72 73 61 |s NOT a |Universa|
|000012c0| 6c 50 72 6f 63 50 74 72 | 2e 0d 09 49 74 20 6d 75 |lProcPtr|...It mu|
|000012d0| 73 74 20 62 65 20 61 20 | 6e 61 74 69 76 65 20 66 |st be a |native f|
|000012e0| 75 6e 63 74 69 6f 6e 20 | 70 6f 69 6e 74 65 72 20 |unction |pointer |
|000012f0| 77 69 74 68 20 4e 4f 20 | 72 6f 75 74 69 6e 65 20 |with NO |routine |
|00001300| 64 65 73 63 72 69 70 74 | 6f 72 2e 0d 2a 29 0d 0d |descript|or..*)..|
|00001310| 76 61 72 69 61 62 6c 65 | 09 74 65 6d 70 0d 0d 3a |variable|.temp..:|
|00001320| 70 70 63 5f 63 6f 64 65 | 20 6d 79 45 78 63 65 70 |ppc_code| myExcep|
|00001330| 74 69 6f 6e 48 61 6e 64 | 6c 65 72 0d 09 72 35 09 |tionHand|ler..r5.|
|00001340| 09 09 30 09 72 33 09 09 | 6c 77 7a 2c 09 09 5c 20 |..0.r3..|lwz,..\ |
|00001350| 72 35 20 3d 20 65 78 63 | 65 70 74 69 6f 6e 20 74 |r5 = exc|eption t|
|00001360| 79 70 65 20 2d 20 77 69 | 6c 6c 20 62 65 20 54 4f |ype - wi|ll be TO|
|00001370| 53 0d 09 72 31 32 09 09 | 09 38 09 72 33 09 09 6c |S..r12..|.8.r3..l|
|00001380| 77 7a 2c 09 09 5c 20 72 | 31 32 20 2d 3e 20 72 65 |wz,..\ r|12 -> re|
|00001390| 67 69 73 74 65 72 20 69 | 6e 66 6f 0d 09 72 31 32 |gister i|nfo..r12|
|000013a0| 09 09 09 72 31 32 09 34 | 09 09 61 64 64 69 2c 09 |...r12.4|..addi,.|
|000013b0| 09 5c 20 6c 6f 6f 6b 20 | 61 74 20 6c 6f 20 33 32 |.\ look |at lo 32|
|000013c0| 20 62 69 74 73 20 6f 66 | 20 72 65 67 73 0d 09 72 | bits of| regs..r|
|000013d0| 31 09 09 09 38 09 72 31 | 32 09 09 6c 77 7a 2c 09 |1...8.r1|2..lwz,.|
|000013e0| 09 5c 20 72 65 73 74 6f | 72 65 20 72 31 0d 09 72 |.\ resto|re r1..r|
|000013f0| 32 09 09 09 31 36 09 72 | 31 32 09 09 6c 77 7a 2c |2...16.r|12..lwz,|
|00001400| 09 09 5c 20 72 32 0d 09 | 72 33 09 09 20 33 20 38 |..\ r2..|r3.. 3 8|
|00001410| 20 2a 09 72 31 32 09 09 | 6c 77 7a 2c 09 09 5c 20 | *.r12..|lwz,..\ |
|00001420| 77 65 27 6c 6c 20 67 65 | 74 20 72 33 20 61 6e 64 |we'll ge|t r3 and|
|00001430| 20 72 34 20 73 69 6e 63 | 65 20 74 68 61 74 0d 09 | r4 sinc|e that..|
|00001440| 72 34 09 09 20 34 20 38 | 20 2a 09 72 31 32 09 09 |r4.. 4 8| *.r12..|
|00001450| 6c 77 7a 2c 09 09 5c 20 | 20 6d 69 67 68 74 20 68 |lwz,..\ | might h|
|00001460| 65 6c 70 20 69 6e 20 74 | 68 65 20 65 72 72 6f 72 |elp in t|he error|
|00001470| 20 64 75 6d 70 0d 09 72 | 31 33 09 09 31 33 20 38 | dump..r|13..13 8|
|00001480| 20 2a 09 72 31 32 09 09 | 6c 77 7a 2c 0d 09 72 31 | *.r12..|lwz,..r1|
|00001490| 34 09 09 31 34 20 38 20 | 2a 09 72 31 32 09 09 6c |4..14 8 |*.r12..l|
|000014a0| 77 7a 2c 0d 09 72 31 35 | 09 09 31 35 20 38 20 2a |wz,..r15|..15 8 *|
|000014b0| 09 72 31 32 09 09 6c 77 | 7a 2c 0d 09 72 31 36 09 |.r12..lw|z,..r16.|
|000014c0| 09 31 36 20 38 20 2a 09 | 72 31 32 09 09 6c 77 7a |.16 8 *.|r12..lwz|
|000014d0| 2c 0d 09 72 31 37 09 09 | 31 37 20 38 20 2a 09 72 |,..r17..|17 8 *.r|
|000014e0| 31 32 09 09 6c 77 7a 2c | 0d 09 72 31 38 09 09 31 |12..lwz,|..r18..1|
|000014f0| 38 20 38 20 2a 09 72 31 | 32 09 09 6c 77 7a 2c 0d |8 8 *.r1|2..lwz,.|
|00001500| 09 72 31 39 09 09 31 39 | 20 38 20 2a 09 72 31 32 |.r19..19| 8 *.r12|
|00001510| 09 09 6c 77 7a 2c 0d 09 | 72 32 30 09 09 32 30 20 |..lwz,..|r20..20 |
|00001520| 38 20 2a 09 72 31 32 09 | 09 6c 77 7a 2c 0d 09 72 |8 *.r12.|.lwz,..r|
|00001530| 32 31 09 09 32 31 20 38 | 20 2a 09 72 31 32 09 09 |21..21 8| *.r12..|
|00001540| 6c 77 7a 2c 0d 0d 28 2a | 09 72 32 32 09 09 32 32 |lwz,..(*|.r22..22|
|00001550| 20 38 20 2a 09 72 31 32 | 09 09 6c 77 7a 2c 09 09 | 8 *.r12|..lwz,..|
|00001560| 5c 20 6e 6f 74 20 6d 75 | 63 68 20 70 6f 69 6e 74 |\ not mu|ch point|
|00001570| 20 69 6e 20 62 6f 74 68 | 65 72 69 6e 67 0d 09 72 | in both|ering..r|
|00001580| 32 33 09 09 32 33 20 38 | 20 2a 09 72 31 32 09 09 |23..23 8| *.r12..|
|00001590| 6c 77 7a 2c 09 09 5c 20 | 20 77 69 74 68 20 74 68 |lwz,..\ | with th|
|000015a0| 65 73 65 0d 09 72 32 34 | 09 09 32 34 20 38 20 2a |ese..r24|..24 8 *|
|000015b0| 09 72 31 32 09 09 6c 77 | 7a 2c 0d 09 72 32 35 09 |.r12..lw|z,..r25.|
|000015c0| 09 32 35 20 38 20 2a 09 | 72 31 32 09 09 6c 77 7a |.25 8 *.|r12..lwz|
|000015d0| 2c 0d 09 72 32 36 09 09 | 32 36 20 38 20 2a 09 72 |,..r26..|26 8 *.r|
|000015e0| 31 32 09 09 6c 77 7a 2c | 0d 09 72 32 37 09 09 32 |12..lwz,|..r27..2|
|000015f0| 37 20 38 20 2a 09 72 31 | 32 09 09 6c 77 7a 2c 0d |7 8 *.r1|2..lwz,.|
|00001600| 09 72 32 38 09 09 32 38 | 20 38 20 2a 09 72 31 32 |.r28..28| 8 *.r12|
|00001610| 09 09 6c 77 7a 2c 0d 09 | 72 32 39 09 09 32 39 20 |..lwz,..|r29..29 |
|00001620| 38 20 2a 09 72 31 32 09 | 09 6c 77 7a 2c 0d 09 72 |8 *.r12.|.lwz,..r|
|00001630| 33 30 09 09 33 30 20 38 | 20 2a 09 72 31 32 09 09 |30..30 8| *.r12..|
|00001640| 6c 77 7a 2c 0d 09 72 33 | 31 09 09 33 31 20 38 20 |lwz,..r3|1..31 8 |
|00001650| 2a 09 72 31 32 09 09 6c | 77 7a 2c 0d 2a 29 0d 09 |*.r12..l|wz,.*)..|
|00001660| 72 30 09 09 27 20 28 65 | 78 63 65 70 29 20 32 2b |r0..' (e|xcep) 2+|
|00001670| 09 64 69 63 61 64 64 72 | 2c 09 5c 20 77 65 20 73 |.dicaddr|,.\ we s|
|00001680| 65 74 20 28 65 78 63 65 | 70 29 20 75 70 20 77 69 |et (exce|p) up wi|
|00001690| 74 68 20 33 20 70 61 72 | 6d 73 0d 09 72 30 09 09 |th 3 par|ms..r0..|
|000016a0| 09 09 09 09 6d 74 63 74 | 72 2c 0d 09 09 09 09 09 |....mtct|r,......|
|000016b0| 09 09 62 63 74 72 2c 0d | 3b 70 70 63 5f 63 6f 64 |..bctr,.|;ppc_cod|
|000016c0| 65 0d 0d 3a 20 69 6e 73 | 74 61 6c 6c 5f 6d 79 5f |e..: ins|tall_my_|
|000016d0| 65 78 63 65 70 74 69 6f | 6e 5f 68 61 6e 64 6c 65 |exceptio|n_handle|
|000016e0| 72 0d 09 5b 27 5d 20 6d | 79 45 78 63 65 70 74 69 |r..['] m|yExcepti|
|000016f0| 6f 6e 48 61 6e 64 6c 65 | 72 20 32 2b 20 74 65 6d |onHandle|r 2+ tem|
|00001700| 70 20 21 0d 09 74 65 6d | 70 20 20 49 6e 73 74 61 |p !..tem|p Insta|
|00001710| 6c 6c 45 78 63 65 70 74 | 69 6f 6e 48 61 6e 64 6c |llExcept|ionHandl|
|00001720| 65 72 20 20 64 72 6f 70 | 0d 3b 0d 0d 3a 20 66 69 |er drop|.;..: fi|
|00001730| 78 5f 73 65 67 6d 65 6e | 74 73 20 20 7b 20 5c 20 |x_segmen|ts { \ |
|00001740| 5e 53 54 20 6c 65 6e 20 | 73 65 67 53 74 61 72 74 |^ST len |segStart|
|00001750| 20 23 63 68 6f 70 70 65 | 64 20 63 75 72 72 5f 63 | #choppe|d curr_c|
|00001760| 6f 64 65 20 63 75 72 72 | 5f 64 61 74 61 20 2d 2d |ode curr|_data --|
|00001770| 20 7d 0d 0d 09 69 6e 73 | 74 6c 64 3f 20 20 30 45 | }...ins|tld? 0E|
|00001780| 58 49 54 0d 0d 09 73 65 | 67 54 61 62 6c 65 20 2d |XIT...se|gTable -|
|00001790| 3e 20 5e 53 54 0d 09 63 | 6f 64 65 5f 73 74 61 72 |> ^ST..c|ode_star|
|000017a0| 74 20 2d 3e 20 63 75 72 | 72 5f 63 6f 64 65 0d 09 |t -> cur|r_code..|
|000017b0| 63 6f 64 65 5f 73 74 61 | 72 74 20 35 36 20 2b 20 |code_sta|rt 56 + |
|000017c0| 40 20 2d 3e 20 23 63 68 | 6f 70 70 65 64 0d 09 63 |@ -> #ch|opped..c|
|000017d0| 75 72 72 5f 63 6f 64 65 | 20 23 63 68 6f 70 70 65 |urr_code| #choppe|
|000017e0| 64 20 2d 20 73 65 67 54 | 61 62 6c 65 20 34 2b 20 |d - segT|able 4+ |
|000017f0| 21 09 5c 20 73 65 67 20 | 38 20 62 61 73 65 20 61 |!.\ seg |8 base a|
|00001800| 64 64 72 20 28 6d 61 69 | 6e 20 64 69 63 20 63 6f |ddr (mai|n dic co|
|00001810| 64 65 29 0d 09 63 6f 64 | 65 5f 73 74 61 72 74 20 |de)..cod|e_start |
|00001820| 34 2b 20 40 20 20 64 75 | 70 20 2b 2b 3e 20 63 75 |4+ @ du|p ++> cu|
|00001830| 72 72 5f 63 6f 64 65 0d | 09 23 63 68 6f 70 70 65 |rr_code.|.#choppe|
|00001840| 64 20 2b 09 09 09 73 65 | 67 54 61 62 6c 65 20 21 |d +...se|gTable !|
|00001850| 09 09 5c 20 73 65 67 20 | 38 20 6c 65 6e 67 74 68 |..\ seg |8 length|
|00001860| 0d 09 0d 09 64 61 74 61 | 5f 73 74 61 72 74 20 2d |....data|_start -|
|00001870| 3e 20 63 75 72 72 5f 64 | 61 74 61 0d 09 63 6f 64 |> curr_d|ata..cod|
|00001880| 65 5f 73 74 61 72 74 20 | 36 30 20 2b 20 40 20 2d |e_start |60 + @ -|
|00001890| 3e 20 23 63 68 6f 70 70 | 65 64 0d 09 63 75 72 72 |> #chopp|ed..curr|
|000018a0| 5f 64 61 74 61 20 23 63 | 68 6f 70 70 65 64 20 2d |_data #c|hopped -|
|000018b0| 20 73 65 67 54 61 62 6c | 65 20 31 32 20 2b 20 21 | segTabl|e 12 + !|
|000018c0| 09 5c 20 73 65 67 20 39 | 20 62 61 73 65 20 61 64 |.\ seg 9| base ad|
|000018d0| 64 72 20 28 6d 61 69 6e | 20 64 69 63 20 64 61 74 |dr (main| dic dat|
|000018e0| 61 29 0d 09 63 6f 64 65 | 5f 73 74 61 72 74 20 38 |a)..code|_start 8|
|000018f0| 20 2b 20 40 20 20 64 75 | 70 20 2b 2b 3e 20 63 75 | + @ du|p ++> cu|
|00001900| 72 72 5f 64 61 74 61 0d | 09 23 63 68 6f 70 70 65 |rr_data.|.#choppe|
|00001910| 64 20 2b 09 09 09 73 65 | 67 54 61 62 6c 65 20 38 |d +...se|gTable 8|
|00001920| 20 2b 20 21 09 5c 20 73 | 65 67 20 39 20 6c 65 6e | + !.\ s|eg 9 len|
|00001930| 67 74 68 0d 0d 09 6d 61 | 78 5f 73 65 67 73 20 32 |gth...ma|x_segs 2|
|00001940| 0d 09 44 4f 09 69 20 20 | 38 20 2a 20 20 73 65 67 |..DO.i |8 * seg|
|00001950| 54 61 62 6c 65 20 2b 20 | 20 2d 3e 20 5e 53 54 0d |Table + | -> ^ST.|
|00001960| 09 09 5e 53 54 20 63 40 | 20 31 20 61 6e 64 0d 09 |..^ST c@| 1 and..|
|00001970| 09 49 46 09 09 09 5c 20 | 74 68 69 73 20 6f 6e 65 |.IF...\ |this one|
|00001980| 20 69 73 20 69 6e 73 74 | 61 6c 6c 65 64 0d 09 09 | is inst|alled...|
|00001990| 09 5e 53 54 20 40 20 24 | 20 30 30 66 66 66 66 66 |.^ST @ $| 00fffff|
|000019a0| 66 20 61 6e 64 20 23 61 | 6c 69 67 6e 34 20 20 2d |f and #a|lign4 -|
|000019b0| 3e 20 6c 65 6e 0d 09 09 | 09 69 20 31 20 61 6e 64 |> len...|.i 1 and|
|000019c0| 0d 09 09 09 49 46 09 09 | 5c 20 69 74 27 73 20 64 |....IF..|\ it's d|
|000019d0| 61 74 61 0d 09 09 09 09 | 63 75 72 72 5f 64 61 74 |ata.....|curr_dat|
|000019e0| 61 20 20 5e 53 54 20 34 | 2b 20 21 0d 09 09 09 09 |a ^ST 4|+ !.....|
|000019f0| 6c 65 6e 20 2b 2b 3e 20 | 63 75 72 72 5f 64 61 74 |len ++> |curr_dat|
|00001a00| 61 0d 09 09 09 45 4c 53 | 45 09 5c 20 69 74 27 73 |a....ELS|E.\ it's|
|00001a10| 20 63 6f 64 65 0d 09 09 | 09 09 63 75 72 72 5f 63 | code...|..curr_c|
|00001a20| 6f 64 65 20 20 5e 53 54 | 20 34 2b 20 21 0d 09 09 |ode ^ST| 4+ !...|
|00001a30| 09 09 6c 65 6e 20 2b 2b | 3e 20 63 75 72 72 5f 63 |..len ++|> curr_c|
|00001a40| 6f 64 65 0d 09 09 09 54 | 48 45 4e 0d 09 09 54 48 |ode....T|HEN...TH|
|00001a50| 45 4e 0d 09 4c 4f 4f 50 | 0d 3b 0d 0d 3a 20 63 68 |EN..LOOP|.;..: ch|
|00001a60| 6b 5f 74 68 72 65 61 64 | 20 20 7b 20 74 68 72 65 |k_thread| { thre|
|00001a70| 61 64 23 20 5c 20 74 68 | 72 65 61 64 5f 61 64 64 |ad# \ th|read_add|
|00001a80| 72 20 70 72 65 76 5f 6c | 66 61 20 6c 66 61 20 2d |r prev_l|fa lfa -|
|00001a90| 2d 20 7d 0d 0d 09 74 68 | 72 65 61 64 23 20 64 75 |- }...th|read# du|
|00001aa0| 6d 6d 79 5f 6c 65 6e 20 | 63 21 09 09 09 09 5c 20 |mmy_len |c!....\ |
|00001ab0| 66 61 6b 65 20 61 20 22 | 6c 65 6e 67 74 68 20 62 |fake a "|length b|
|00001ac0| 79 74 65 22 20 66 6f 72 | 20 54 48 52 45 41 44 0d |yte" for| THREAD.|
|00001ad0| 09 64 75 6d 6d 79 5f 6c | 65 6e 20 74 68 72 65 61 |.dummy_l|en threa|
|00001ae0| 64 20 20 2d 3e 20 74 68 | 72 65 61 64 5f 61 64 64 |d -> th|read_add|
|00001af0| 72 09 5c 20 61 64 64 72 | 20 6f 66 20 74 68 72 65 |r.\ addr| of thre|
|00001b00| 61 64 20 73 74 61 72 74 | 20 69 6e 20 43 4f 4e 54 |ad start| in CONT|
|00001b10| 45 58 54 0d 09 0d 09 74 | 68 72 65 61 64 5f 61 64 |EXT....t|hread_ad|
|00001b20| 64 72 20 64 69 73 70 6c | 61 63 65 20 20 2d 3e 20 |dr displ|ace -> |
|00001b30| 6c 66 61 09 09 5c 20 61 | 64 64 72 20 6f 66 20 66 |lfa..\ a|ddr of f|
|00001b40| 69 72 73 74 20 6c 69 6e | 6b 20 66 69 65 6c 64 20 |irst lin|k field |
|00001b50| 69 6e 20 74 68 72 65 61 | 64 2c 0d 09 09 09 09 09 |in threa|d,......|
|00001b60| 09 09 09 09 09 5c 20 20 | 69 6e 20 43 4f 4e 54 45 |.....\ |in CONTE|
|00001b70| 58 54 0d 09 6c 66 61 20 | 2d 3e 20 70 72 65 76 5f |XT..lfa |-> prev_|
|00001b80| 6c 66 61 0d 09 42 45 47 | 49 4e 09 6c 66 61 0d 09 |lfa..BEG|IN.lfa..|
|00001b90| 57 48 49 4c 45 09 6c 66 | 61 20 2d 3e 20 70 72 65 |WHILE.lf|a -> pre|
|00001ba0| 76 5f 6c 66 61 0d 09 09 | 09 6c 66 61 20 64 69 73 |v_lfa...|.lfa dis|
|00001bb0| 70 6c 61 63 65 20 2d 3e | 20 6c 66 61 0d 09 52 45 |place ->| lfa..RE|
|00001bc0| 50 45 41 54 0d 3b 0d 0d | 0d 3a 20 63 68 6b 64 69 |PEAT.;..|.: chkdi|
|00001bd0| 63 0d 09 23 74 68 72 65 | 61 64 73 20 20 46 4f 52 |c..#thre|ads FOR|
|00001be0| 20 20 69 20 63 68 6b 5f | 74 68 72 65 61 64 20 20 | i chk_|thread |
|00001bf0| 4e 45 58 54 0d 3b 0d 0d | 0d 5c 20 41 6e 79 20 73 |NEXT.;..|.\ Any s|
|00001c00| 70 65 63 69 61 6c 20 72 | 75 6e 2d 74 69 6d 65 20 |pecial r|un-time |
|00001c10| 69 6e 69 74 69 61 6c 69 | 7a 61 74 69 6f 6e 20 63 |initiali|zation c|
|00001c20| 61 6e 20 62 65 20 64 6f | 6e 65 20 63 6f 6e 76 65 |an be do|ne conve|
|00001c30| 6e 69 65 6e 74 6c 79 20 | 62 79 20 61 64 64 69 6e |niently |by addin|
|00001c40| 67 0d 5c 20 74 68 65 20 | 61 70 70 72 6f 70 72 69 |g.\ the |appropri|
|00001c50| 61 74 65 20 77 6f 72 64 | 73 20 74 6f 20 74 68 65 |ate word|s to the|
|00001c60| 20 78 2d 63 6f 6c 20 49 | 4e 49 54 5f 41 43 54 49 | x-col I|NIT_ACTI|
|00001c70| 4f 4e 53 2e 20 20 54 68 | 65 73 65 20 77 6f 72 64 |ONS. Th|ese word|
|00001c80| 73 20 77 69 6c 6c 20 62 | 65 0d 5c 20 65 78 65 63 |s will b|e.\ exec|
|00001c90| 75 74 65 64 20 6f 6e 20 | 73 74 61 72 74 75 70 20 |uted on |startup |
|00001ca0| 76 69 61 20 45 58 54 52 | 41 5f 49 4e 49 54 53 2c |via EXTR|A_INITS,|
|00001cb0| 20 72 69 67 68 74 20 61 | 66 74 65 72 20 74 68 65 | right a|fter the|
|00001cc0| 20 72 65 73 74 20 6f 66 | 20 74 68 65 0d 5c 20 69 | rest of| the.\ i|
|00001cd0| 6e 69 74 69 61 6c 69 7a | 61 74 69 6f 6e 20 73 74 |nitializ|ation st|
|00001ce0| 75 66 66 20 68 61 73 20 | 62 65 65 6e 20 64 6f 6e |uff has |been don|
|00001cf0| 65 2e 0d 0d 20 20 20 20 | 38 09 78 2d 63 6f 6c 09 |e... |8.x-col.|
|00001d00| 49 4e 49 54 5f 41 43 54 | 49 4f 4e 53 0d 0d 0d 3a |INIT_ACT|IONS...:|
|00001d10| 20 45 58 54 52 41 5f 49 | 4e 49 54 53 0d 09 73 69 | EXTRA_I|NITS..si|
|00001d20| 7a 65 3a 20 69 6e 69 74 | 5f 61 63 74 69 6f 6e 73 |ze: init|_actions|
|00001d30| 20 20 30 20 20 3f 44 4f | 20 20 69 20 65 78 65 63 | 0 ?DO| i exec|
|00001d40| 3a 20 69 6e 69 74 5f 61 | 63 74 69 6f 6e 73 20 20 |: init_a|ctions |
|00001d50| 4c 4f 4f 50 0d 3b 0d 0d | 0d 3a 20 53 59 53 49 4e |LOOP.;..|.: SYSIN|
|00001d60| 49 54 09 09 5c 20 6f 75 | 72 20 66 69 6e 61 6c 20 |IT..\ ou|r final |
|00001d70| 69 6e 69 74 69 61 6c 69 | 7a 61 74 69 6f 6e 20 77 |initiali|zation w|
|00001d80| 6f 72 64 2e 20 20 43 61 | 6c 6c 65 64 20 72 65 67 |ord. Ca|lled reg|
|00001d90| 61 72 64 6c 65 73 73 20 | 6f 66 77 68 65 74 68 65 |ardless |ofwhethe|
|00001da0| 72 20 0d 09 09 09 09 5c | 20 20 77 65 27 72 65 20 |r .....\| we're |
|00001db0| 69 6e 20 74 68 65 20 64 | 65 76 65 6c 6f 70 6d 65 |in the d|evelopme|
|00001dc0| 6e 74 20 65 6e 76 69 72 | 6f 6e 6d 65 6e 74 20 6f |nt envir|onment o|
|00001dd0| 72 20 61 6e 20 69 6e 73 | 74 61 6c 6c 65 64 20 61 |r an ins|talled a|
|00001de0| 70 70 2e 0d 09 69 6e 69 | 74 32 0d 09 66 69 78 5f |pp...ini|t2..fix_|
|00001df0| 73 65 67 6d 65 6e 74 73 | 0d 5c 09 66 69 78 5f 70 |segments|.\.fix_p|
|00001e00| 72 6f 63 73 09 09 5c 20 | 6a 61 6e 20 39 39 20 2d |rocs..\ |jan 99 -|
|00001e10| 20 6e 6f 77 20 77 65 20 | 63 68 65 63 6b 20 61 74 | now we |check at|
|00001e20| 20 5b 27 5d 2d 74 69 6d | 65 2c 20 73 6f 20 77 65 | [']-tim|e, so we|
|00001e30| 20 63 61 6e 20 68 61 76 | 65 0d 09 09 09 09 09 5c | can hav|e......\|
|00001e40| 20 20 70 70 63 5f 70 72 | 6f 63 73 20 69 6e 20 6d | ppc_pr|ocs in m|
|00001e50| 6f 64 75 6c 65 73 2e 20 | 20 53 65 65 20 71 70 43 |odules. | See qpC|
|00001e60| 6f 6e 64 2e 0d 09 69 6e | 73 74 61 6c 6c 5f 72 65 |ond...in|stall_re|
|00001e70| 71 64 5f 61 70 70 6c 65 | 45 76 65 6e 74 73 0d 09 |qd_apple|Events..|
|00001e80| 69 6e 73 74 61 6c 6c 5f | 6d 79 5f 65 78 63 65 70 |install_|my_excep|
|00001e90| 74 69 6f 6e 5f 68 61 6e | 64 6c 65 72 0d 09 30 20 |tion_han|dler..0 |
|00001ea0| 2d 3e 20 61 63 74 57 0d | 09 72 65 73 69 7a 65 5f |-> actW.|.resize_|
|00001eb0| 66 57 69 6e 64 0d 09 24 | 20 46 35 45 46 20 20 73 |fWind..$| F5EF s|
|00001ec0| 65 74 4d 61 73 6b 3a 20 | 66 45 76 65 6e 74 09 09 |etMask: |fEvent..|
|00001ed0| 5c 20 6d 61 73 6b 20 6f | 75 74 20 6b 65 79 20 75 |\ mask o|ut key u|
|00001ee0| 70 0d 09 2d 6d 6f 64 65 | 6c 65 73 73 20 20 20 6b |p..-mode|less k|
|00001ef0| 65 79 21 20 20 2b 63 75 | 72 73 0d 09 65 78 74 72 |ey! +cu|rs..extr|
|00001f00| 61 5f 69 6e 69 74 73 09 | 09 09 09 09 5c 20 64 6f |a_inits.|....\ do|
|00001f10| 20 61 6e 79 20 65 78 74 | 72 61 20 69 6e 69 74 69 | any ext|ra initi|
|00001f20| 61 6c 69 7a 61 74 69 6f | 6e 0d 3b 0d 0d 28 2a 0d |alizatio|n.;..(*.|
|00001f30| 50 41 55 53 45 20 73 68 | 6f 75 6c 64 20 62 65 20 |PAUSE sh|ould be |
|00001f40| 63 61 6c 6c 65 64 20 61 | 74 20 73 74 72 61 74 65 |called a|t strate|
|00001f50| 67 69 63 20 69 6e 74 65 | 72 76 61 6c 73 20 69 6e |gic inte|rvals in|
|00001f60| 20 61 6c 6c 20 61 70 70 | 6c 69 63 61 74 69 6f 6e | all app|lication|
|00001f70| 73 2c 0d 75 6e 6c 65 73 | 73 20 4b 65 79 20 69 73 |s,.unles|s Key is|
|00001f80| 20 62 65 69 6e 67 20 63 | 61 6c 6c 65 64 20 66 72 | being c|alled fr|
|00001f90| 65 71 75 65 6e 74 6c 79 | 20 28 73 65 65 20 6e 6f |equently| (see no|
|00001fa0| 74 65 20 31 20 62 65 6c | 6f 77 29 2e 20 20 50 61 |te 1 bel|ow). Pa|
|00001fb0| 75 73 65 0d 6e 6f 72 6d | 61 6c 6c 79 20 63 61 6c |use.norm|ally cal|
|00001fc0| 6c 73 20 20 6e 65 78 74 | 3a 20 66 45 76 65 6e 74 |ls next|: fEvent|
|00001fd0| 20 20 77 68 69 63 68 20 | 61 6c 6c 6f 77 73 20 61 | which |allows a|
|00001fe0| 20 74 61 73 6b 20 73 77 | 69 74 63 68 20 74 6f 20 | task sw|itch to |
|00001ff0| 62 65 20 64 6f 6e 65 0d | 75 6e 64 65 72 20 4d 75 |be done.|under Mu|
|00002000| 6c 74 69 46 69 6e 64 65 | 72 2c 20 61 6e 64 20 77 |ltiFinde|r, and w|
|00002010| 68 69 63 68 20 61 6c 73 | 6f 20 68 61 6e 64 6c 65 |hich als|o handle|
|00002020| 73 20 61 6e 79 20 70 65 | 6e 64 69 6e 67 20 65 76 |s any pe|nding ev|
|00002030| 65 6e 74 73 20 66 6f 72 | 20 74 68 69 73 0d 74 61 |ents for| this.ta|
|00002040| 73 6b 2c 20 73 75 63 68 | 20 61 73 20 77 69 6e 64 |sk, such| as wind|
|00002050| 6f 77 20 75 70 64 61 74 | 65 73 2e 20 20 52 65 6d |ow updat|es. Rem|
|00002060| 65 6d 62 65 72 20 74 6f | 20 64 69 73 61 62 6c 65 |ember to| disable|
|00002070| 20 61 6e 79 20 6d 65 6e | 75 73 20 65 74 63 2e 20 | any men|us etc. |
|00002080| 74 68 61 74 0d 79 6f 75 | 20 64 6f 6e 27 74 20 77 |that.you| don't w|
|00002090| 61 6e 74 20 74 6f 20 65 | 78 65 63 75 74 65 20 69 |ant to e|xecute i|
|000020a0| 6e 20 74 68 69 73 20 73 | 69 74 75 61 74 69 6f 6e |n this s|ituation|
|000020b0| 21 20 20 55 6e 65 78 70 | 65 63 74 65 64 20 72 65 |! Unexp|ected re|
|000020c0| 2d 65 6e 74 72 61 6e 63 | 79 0d 69 73 20 61 20 67 |-entranc|y.is a g|
|000020d0| 6f 6f 64 20 77 61 79 20 | 74 6f 20 62 6f 6d 62 21 |ood way |to bomb!|
|000020e0| 0d 0d 4e 4f 54 45 20 54 | 48 45 20 46 4f 4c 4c 4f |..NOTE T|HE FOLLO|
|000020f0| 57 49 4e 47 20 50 4f 49 | 4e 54 53 3a 0d 0d 31 2e |WING POI|NTS:..1.|
|00002100| 20 20 4b 45 59 20 61 6c | 73 6f 20 63 61 6c 6c 73 | KEY al|so calls|
|00002110| 20 20 6e 65 78 74 3a 20 | 66 45 76 65 6e 74 2e 20 | next: |fEvent. |
|00002120| 20 53 6f 20 69 66 20 77 | 65 27 72 65 20 77 61 69 | So if w|e're wai|
|00002130| 74 69 6e 67 20 6f 6e 20 | 6b 65 79 73 2c 0d 77 65 |ting on |keys,.we|
|00002140| 20 73 68 6f 75 6c 64 6e | 27 74 20 63 61 6c 6c 20 | shouldn|'t call |
|00002150| 50 61 75 73 65 2c 20 65 | 73 70 65 63 69 61 6c 6c |Pause, e|speciall|
|00002160| 79 20 61 73 20 50 61 75 | 73 65 20 77 69 6c 6c 20 |y as Pau|se will |
|00002170| 67 6f 62 62 6c 65 20 61 | 6e 79 20 6b 65 79 73 0d |gobble a|ny keys.|
|00002180| 74 79 70 65 64 21 0d 0d | 32 2e 20 20 6e 65 78 74 |typed!..|2. next|
|00002190| 3a 20 66 45 76 65 6e 74 | 20 20 63 61 6c 6c 73 20 |: fEvent| calls |
|000021a0| 57 61 69 74 4e 65 78 74 | 45 76 65 6e 74 2e 20 20 |WaitNext|Event. |
|000021b0| 49 66 20 77 65 20 64 6f | 6e 27 74 20 77 61 6e 74 |If we do|n't want|
|000021c0| 20 74 6f 20 62 65 0d 73 | 75 73 70 65 6e 64 65 64 | to be.s|uspended|
|000021d0| 20 75 6e 74 69 6c 20 74 | 68 65 20 6e 65 78 74 20 | until t|he next |
|000021e0| 65 76 65 6e 74 20 66 6f | 72 20 75 73 2c 20 77 65 |event fo|r us, we|
|000021f0| 20 6e 65 65 64 20 74 6f | 20 73 65 74 20 53 6c 65 | need to| set Sle|
|00002200| 65 70 54 69 63 6b 73 20 | 74 6f 0d 61 20 73 75 69 |epTicks |to.a sui|
|00002210| 74 61 62 6c 79 20 6c 6f | 77 20 6e 75 6d 62 65 72 |tably lo|w number|
|00002220| 2e 20 20 50 41 55 53 45 | 20 62 79 20 64 65 66 61 |. PAUSE| by defa|
|00002230| 75 6c 74 20 73 65 74 73 | 20 53 6c 65 65 70 54 69 |ult sets| SleepTi|
|00002240| 63 6b 73 20 74 6f 20 7a | 65 72 6f 0d 74 65 6d 70 |cks to z|ero.temp|
|00002250| 6f 72 61 72 69 6c 79 2e | 20 20 43 68 61 6e 67 65 |orarily.| Change|
|00002260| 20 74 68 69 73 20 69 66 | 20 6e 65 63 65 73 73 61 | this if| necessa|
|00002270| 72 79 2e 0d 0d 33 2e 20 | 20 49 66 20 6d 75 6c 74 |ry...3. | If mult|
|00002280| 69 74 61 73 6b 69 6e 67 | 20 69 73 20 69 6e 73 74 |itasking| is inst|
|00002290| 61 6c 6c 65 64 2c 20 50 | 41 55 53 45 20 6d 61 79 |alled, P|AUSE may|
|000022a0| 20 62 65 20 72 65 64 69 | 72 65 63 74 65 64 20 28 | be redi|rected (|
|000022b0| 62 75 74 20 6e 6f 74 0d | 6e 65 63 65 73 73 61 72 |but not.|necessar|
|000022c0| 69 6c 79 29 20 73 6f 20 | 74 68 61 74 20 69 74 20 |ily) so |that it |
|000022d0| 6a 75 73 74 20 63 61 6c | 6c 73 20 4e 45 58 54 5f |just cal|ls NEXT_|
|000022e0| 54 41 53 4b 20 74 6f 20 | 64 6f 20 61 20 74 61 73 |TASK to |do a tas|
|000022f0| 6b 20 73 77 69 74 63 68 | 2e 0d 54 68 69 73 20 77 |k switch|..This w|
|00002300| 69 6c 6c 20 68 61 70 70 | 65 6e 20 69 66 20 77 65 |ill happ|en if we|
|00002310| 20 68 61 76 65 20 61 20 | 66 6f 72 65 67 72 6f 75 | have a |foregrou|
|00002320| 6e 64 20 74 61 73 6b 20 | 63 61 6c 6c 69 6e 67 20 |nd task |calling |
|00002330| 20 6e 65 78 74 3a 20 66 | 45 76 65 6e 74 0d 72 65 | next: f|Event.re|
|00002340| 70 65 61 74 65 64 6c 79 | 2c 20 77 68 69 6c 65 20 |peatedly|, while |
|00002350| 77 65 20 64 6f 20 61 6c | 6c 20 74 68 65 20 72 65 |we do al|l the re|
|00002360| 61 6c 20 77 6f 72 6b 20 | 69 6e 20 74 68 65 20 62 |al work |in the b|
|00002370| 61 63 6b 67 72 6f 75 6e | 64 2e 0d 54 68 69 73 20 |ackgroun|d..This |
|00002380| 77 61 79 20 77 65 20 63 | 61 6e 20 6b 65 65 70 20 |way we c|an keep |
|00002390| 65 78 65 63 75 74 69 6e | 67 20 64 75 72 69 6e 67 |executin|g during|
|000023a0| 20 77 69 6e 64 6f 77 20 | 64 72 61 67 73 20 61 6e | window |drags an|
|000023b0| 64 20 6d 65 6e 75 20 73 | 65 6c 65 63 74 69 6f 6e |d menu s|election|
|000023c0| 73 2e 0d 0d 34 2e 20 20 | 44 65 72 65 66 65 72 65 |s...4. |Derefere|
|000023d0| 6e 63 65 64 20 70 6f 69 | 6e 74 65 72 73 20 6d 61 |nced poi|nters ma|
|000023e0| 79 20 62 65 63 6f 6d 65 | 20 69 6e 76 61 6c 69 64 |y become| invalid|
|000023f0| 20 61 63 72 6f 73 73 20 | 61 20 50 41 55 53 45 2e | across |a PAUSE.|
|00002400| 20 20 42 65 20 63 61 72 | 65 66 75 6c 2e 0d 2a 29 | Be car|eful..*)|
|00002410| 0d 0d 3a 20 28 50 41 55 | 53 45 29 0d 09 73 61 76 |..: (PAU|SE)..sav|
|00002420| 69 6e 67 44 69 63 3f 20 | 20 3f 45 58 49 54 09 09 |ingDic? | ?EXIT..|
|00002430| 5c 20 49 66 20 63 61 6c | 6c 65 64 20 64 75 72 69 |\ If cal|led duri|
|00002440| 6e 67 20 61 20 64 69 63 | 20 73 61 76 65 2c 20 6d |ng a dic| save, m|
|00002450| 75 73 74 6e 27 74 20 70 | 72 6f 63 65 73 73 0d 09 |ustn't p|rocess..|
|00002460| 09 09 09 09 09 09 5c 20 | 20 65 76 65 6e 74 73 20 |......\ | events |
|00002470| 73 69 6e 63 65 20 6d 6f | 64 75 6c 65 73 20 61 72 |since mo|dules ar|
|00002480| 65 20 70 75 72 67 65 64 | 0d 09 73 6c 65 65 70 74 |e purged|..sleept|
|00002490| 69 63 6b 73 20 20 30 20 | 2d 3e 20 73 6c 65 65 70 |icks 0 |-> sleep|
|000024a0| 74 69 63 6b 73 0d 09 67 | 65 74 4d 61 73 6b 3a 20 |ticks..g|etMask: |
|000024b0| 66 45 76 65 6e 74 20 20 | 24 20 46 46 43 37 20 73 |fEvent |$ FFC7 s|
|000024c0| 65 74 4d 61 73 6b 3a 20 | 66 45 76 65 6e 74 09 09 |etMask: |fEvent..|
|000024d0| 5c 20 61 6c 6c 20 65 78 | 63 65 70 74 20 6b 65 79 |\ all ex|cept key|
|000024e0| 20 65 76 65 6e 74 73 0d | 09 6e 65 78 74 3a 20 66 | events.|.next: f|
|000024f0| 45 76 65 6e 74 20 20 5c | 20 49 46 20 20 32 64 72 |Event \| IF 2dr|
|00002500| 6f 70 20 20 54 48 45 4e | 20 20 20 20 5c 20 33 30 |op THEN| \ 30|
|00002510| 41 70 72 39 34 20 44 42 | 48 20 6e 65 78 74 3a 20 |Apr94 DB|H next: |
|00002520| 6e 6f 20 6c 6f 6e 67 65 | 72 20 72 65 74 75 72 6e |no longe|r return|
|00002530| 73 20 73 74 61 63 6b 20 | 69 74 65 6d 73 0d 09 73 |s stack |items..s|
|00002540| 65 74 4d 61 73 6b 3a 20 | 66 45 76 65 6e 74 20 20 |etMask: |fEvent |
|00002550| 20 2d 3e 20 73 6c 65 65 | 70 74 69 63 6b 73 20 20 | -> slee|pticks |
|00002560| 3b 0d 0d 0d 5c 20 43 4c | 33 20 69 73 20 74 68 65 |;...\ CL|3 is the|
|00002570| 20 6e 65 78 74 20 63 6c | 65 61 6e 75 70 20 77 6f | next cl|eanup wo|
|00002580| 72 64 20 2d 20 69 74 20 | 63 6c 65 61 6e 73 20 75 |rd - it |cleans u|
|00002590| 70 20 61 6c 6c 20 6f 62 | 6a 65 63 74 20 73 74 75 |p all ob|ject stu|
|000025a0| 66 66 20 6f 6e 20 61 62 | 6f 72 74 2c 0d 5c 20 61 |ff on ab|ort,.\ a|
|000025b0| 73 20 77 65 6c 6c 20 61 | 73 20 77 68 61 74 65 76 |s well a|s whatev|
|000025c0| 65 72 20 77 65 20 77 65 | 72 65 20 64 6f 69 6e 67 |er we we|re doing|
|000025d0| 20 62 65 66 6f 72 65 20 | 28 73 65 65 20 43 4c 32 | before |(see CL2|
|000025e0| 20 69 6e 20 66 69 6c 65 | 20 46 69 6c 65 73 2c 20 | in file| Files, |
|000025f0| 61 6e 64 20 43 4c 31 0d | 5c 20 69 6e 20 66 69 6c |and CL1.|\ in fil|
|00002600| 65 20 43 6c 61 73 73 29 | 2e 0d 0d 3a 20 43 4c 33 |e Class)|...: CL3|
|00002610| 0d 09 28 20 6b 65 79 21 | 20 29 20 20 30 20 48 69 |..( key!| ) 0 Hi|
|00002620| 6c 69 74 65 4d 65 6e 75 | 20 20 20 61 72 72 6f 77 |liteMenu| arrow|
|00002630| 63 75 72 73 0d 09 63 6c | 32 20 20 3b 0d 0d 0d 3a |curs..cl|2 ;...:|
|00002640| 20 28 53 46 29 0d 09 61 | 6c 69 76 65 3a 20 66 57 | (SF)..a|live: fW|
|00002650| 69 6e 64 20 49 46 20 20 | 73 65 74 43 6f 6e 74 52 |ind IF |setContR|
|00002660| 65 63 74 3a 20 66 57 69 | 6e 64 20 20 73 65 74 3a |ect: fWi|nd set:|
|00002670| 20 66 57 69 6e 64 20 20 | 73 65 6c 65 63 74 3a 20 | fWind |select: |
|00002680| 66 57 69 6e 64 20 20 54 | 48 45 4e 0d 09 69 6e 69 |fWind T|HEN..ini|
|00002690| 74 66 6f 6e 74 20 20 3b | 0d 0d 0d 27 20 73 79 73 |tfont ;|...' sys|
|000026a0| 69 6e 69 74 09 2d 3e 20 | 6f 62 6a 69 6e 69 74 0d |init.-> |objinit.|
|000026b0| 27 20 28 70 61 75 73 65 | 29 09 2d 3e 20 70 61 75 |' (pause|).-> pau|
|000026c0| 73 65 0d 27 20 28 73 66 | 29 09 09 2d 3e 20 73 65 |se.' (sf|)..-> se|
|000026d0| 74 46 77 69 6e 64 0d 27 | 20 63 6c 33 09 09 2d 3e |tFwind.'| cl3..->|
|000026e0| 20 61 62 6f 72 74 76 65 | 63 0d 0d 0d 3a 66 20 52 | abortve|c...:f R|
|000026f0| 55 4e 0d 09 63 72 20 2e | 22 20 54 68 69 73 20 69 |UN..cr .|" This i|
|00002700| 73 20 74 68 65 20 73 74 | 61 67 65 20 33 20 6e 75 |s the st|age 3 nu|
|00002710| 63 6c 65 75 73 2e 22 20 | 63 72 0d 09 51 55 49 54 |cleus." |cr..QUIT|
|00002720| 0d 3b 66 0d 0d 0d 5c 20 | 3d 3d 3d 3d 3d 3d 3d 3d |.;f...\ |========|
|00002730| 3d 20 53 6f 6d 65 20 70 | 70 63 5f 70 72 6f 63 73 |= Some p|pc_procs|
|00002740| 20 77 65 20 6e 65 65 64 | 20 77 68 69 63 68 20 61 | we need| which a|
|00002750| 72 65 20 75 73 65 64 20 | 69 6e 20 6d 6f 64 75 6c |re used |in modul|
|00002760| 65 73 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 0d 5c 20 |es =====|====..\ |
|00002770| 54 45 53 63 72 6f 6c 6c | 65 72 0d 0d 6e 69 6c 50 |TEScroll|er..nilP|
|00002780| 09 76 61 6c 75 65 09 43 | 6c 69 63 6b 65 64 53 63 |.value.C|lickedSc|
|00002790| 72 6f 6c 6c 65 72 0d 0d | 0d 6b 6f 6e 73 74 20 75 |roller..|.konst u|
|000027a0| 70 70 54 45 43 6c 69 63 | 6b 4c 6f 6f 70 50 72 6f |ppTEClic|kLoopPro|
|000027b0| 63 49 6e 66 6f 0d 0d 3a | 70 70 63 5f 70 72 6f 63 |cInfo..:|ppc_proc|
|000027c0| 20 20 44 52 41 47 50 52 | 4f 43 0d 09 61 75 74 6f | DRAGPR|OC..auto|
|000027d0| 53 63 72 6f 6c 6c 3a 20 | 5b 20 63 6c 69 63 6b 65 |Scroll: |[ clicke|
|000027e0| 64 53 63 72 6f 6c 6c 65 | 72 20 5d 0d 09 31 09 09 |dScrolle|r ]..1..|
|000027f0| 09 09 5c 20 57 65 20 68 | 61 76 65 20 74 6f 20 72 |..\ We h|ave to r|
|00002800| 65 74 75 72 6e 20 61 20 | 50 61 73 63 61 6c 20 62 |eturn a |Pascal b|
|00002810| 6f 6f 6c 65 61 6e 20 54 | 52 55 45 21 0d 3b 70 70 |oolean T|RUE!.;pp|
|00002820| 63 5f 70 72 6f 63 0d 00 | 00 00 00 00 00 00 00 00 |c_proc..|........|
|00002830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002880| 00 00 01 00 00 00 01 42 | 00 00 00 42 00 00 00 3b |.......B|...B...;|
|00002890| 00 00 00 12 03 a8 ff ff | 7f 08 03 00 00 00 00 b5 |........|........|
|000028a0| 00 00 00 00 00 00 00 9e | 00 00 00 00 00 00 00 ae |........|........|
|000028b0| 08 7a 4f 62 6a 69 6e 69 | 74 62 02 00 00 00 50 61 |.zObjini|tb....Pa|
|000028c0| 72 74 53 49 54 21 00 00 | 00 00 00 00 00 00 00 01 |rtSIT!..|........|
|000028d0| 00 00 50 61 72 74 53 49 | 54 21 00 00 00 00 00 00 |..PartSI|T!......|
|000028e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028f0| 00 00 b3 66 c2 78 00 00 | 00 00 00 00 01 7d 00 00 |...f.x..|.....}..|
|00002900| 00 3e 4c f3 00 00 7f 08 | 07 00 00 00 00 00 00 00 |.>L.....|........|
|00002910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002930| 00 00 a7 53 fc 11 00 00 | 00 a4 00 00 00 00 00 00 |...S....|........|
|00002940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002960| 00 00 00 00 00 00 00 00 | 00 00 05 00 00 00 00 3f |........|.......?|
|00002970| 03 fc 8a ff 7f 08 03 00 | 00 00 00 a1 00 00 00 00 |........|........|
|00002980| 00 00 00 3e 00 00 00 00 | 00 00 00 00 00 00 00 00 |...>....|........|
|00002990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 04 dc |........|........|
|000029b0| 00 00 04 dc 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029c0| 00 00 00 00 01 00 00 00 | 01 42 00 00 00 42 00 00 |........|.B...B..|
|000029d0| 00 3b 01 63 29 68 24 ba | 00 00 00 1c 00 32 00 00 |.;.c)h$.|.....2..|
|000029e0| 4d 49 46 4f 00 00 00 0a | 00 80 00 00 00 00 00 00 |MIFO....|........|
|000029f0| 01 63 2b 7c 08 4d 69 73 | 63 49 6e 66 6f 00 00 00 |.c+|.Mis|cInfo...|
+--------+-------------------------+-------------------------+--------+--------+